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SEQ 0001 



.REM 



IDEMTiriCATIOl^ 



PRODUCT CODES 



AC-E911C-MC 



PRODUCT MAMES 



CXDZBCO DZ¥11 MODULE 



PRODUCT DATES 



SEPTEMBER 1978 



M&IlfllHERS 



DEC/Xll SUPPORT GROUP 



THE IMFQSMATIOl li THIS DOCUMEMT IS SUBJECT TO CHAUGE 
IITBOUT MOTICE ISD SHOULD SOT BE CQMSTRUED IS I COMMITMEMT 
BY DIGITAL EQUIPMENT CORPORATIOi* DIGITAL EQUIPMEiT 
CORPORATIOi ASSUMES 10 RESPOIfSIBILITY FOR kUY ERRORS THAT 
MAY APPEAR IN THIS MAiUAL* 

THE SOFTMARE DESCRIBED 18 THIS DOCUMENT IS FURilSHED TO THE 



COPYRIGHT (C) 1976^1978 DIGITAL EQUIPMEMT CORPORATIOI^ 
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SEQ 0002 



1« 



ABSTRACTS 



dzb is ah lomod that exercises op to eight (cohsecutively addressed) 

dzyll asyhchrorous ihterfaces. it uses maihtehahce mode to transmit 

and receive a bihary couiit patterh outputted amd received 

iii 32. character bursts. the major portion of the error 

checkimg is deferred to priority level 0. all devices selected for test 

are activated and run concurrently. all four lines are run on each selected device, 

requirements: 



HARDWARE: AT LEAST QHE DZVll INTERFACE; NO WRAPAROUND OR MAINTENANCE CABLE IS NEEDED 

STORAGE: S DZB REQUIRES: 

1. DECIMAL words: 1021 

2. OCTAL words: 01775 

3. OCTAL bytes: 3772 



3. PASS DEFINITION: 

ONE PASS OF THE DZB MODULE CONSISTS OF TRANSMITTING AND RE- 
CEIVING 8960. CHARACTERS FOR EACH LINE OF EACH OZVll SELECTED 

4. EXECUTION JPIME: 

EXECUTION TIME IS PROPORTIONAL TO THE BAUD RATE BUT SHOULD TAKE AN AVERAGE OF ONE 
MINUTE TO COMPLETE ONE PASS WHEN RUNNING ALONE ON A LSI-11 AT 9600. BAUD. 

5. CONFIGURATION PARAMETERS: 
DEFAULT PARAMETERS: 

DVA: 1^ VCT: l^ BRI: 4^ BR2: 4^ DVCS l, SRll 
REQUIRED parameters: 

AT CONFIGURATION TIME THE USER MUST SPECIFY: 

DVA: ADDRESS OF FIRST DZVll CSR REG. 

VCT: VECTOR ADDRESS OF FIRST DZVll 

DVC: NO OF DZVll 'S IF GREATER THAN 1 
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DEVICE OPTIOi SETUPS 



MQME REQUIRED 



MODULE 0PERATIQM2 



STARTS DETERMINE IF ANY DEVICES ARE SELECTED^ DO HOT RUi 
THE MODULE IF MO DEVICES ARE SELECTED. IF THERE 
ARE SELECTED DEVICES. IMTIALIZE THE BIIIAR¥ COUMT 
PATTER! AT 0« COSTIMUE PRQCESSIMG* 

RESTRTS INITIALIZE THE ITERATION COUSTER TO 1120» DETERMIME 
IF AMY DZVll'S ARE SELECTED. LOAD THE IMTERRUPT 
VECTORS TO POIHT TO THE JSR LINKIiG TABLE^ 

SET0P2 2 INITIALIZE THE QUEUE POIISTERS« CLEAR ALL THE BUFFERS 
AND QUEUES* CLEAR THE BUFFER ACCESS FLAG (LCKQUT) 
IM CASE IT MAS STILL SET BY A COITROL C INTERRUPT 
OF THE PROGRAM. 

ACTVATE2 THIS SEGMENT INITIALIZES EACH DZVll SELECTED* 
EIGHT BITS PER CHARACTER IS SELECTED* 
IF A BAUD RATE IS SELECTED£ IT IS CALCULATED AND 
ASSIGNED* OTHERMISE THE DEFAULT RATE OF 9600 BAUD 
IS ASSUMED, 

INITIAL! THE DATA PATTERN IS LOADED INTO THE TRANSMITTER 
BUFFER. IT IS A BINARY COUNT PATTERN MHICH^ ON 
SUCCESSIVE ITERATIONS^ BEGINS 0£lO,204 . . •/177760,177770, 
THE NUMBER OF CHARACTERS TO BE TRANSMITTED IS CALCULATED. 
TRANSMITTER INTERRUPTS ARE ENABLED, 

ALL SELECTED TRANSMITTERS FOR EACH SELECTED DZVll ARE 
ENABLED. 

TMRSET2 TMRCST IS USED AS A MULTIPLYING FACTOR TO DETERMINE 
THE WAITING LENGTH FOR THE MATCHDOG TIMER. IT IS 
PRESENTLY SET AT 5 TO ALLOW SEVENTY-FIVE SECONDS 
TO ELAPSE BEFORE TAKING FURTHER ACTION. 

TIMERS THIS IS THE MATCHDOG TIMER LOOP. IT IS CONTROLLED 

BY R4 AND TMRCNT. IF ALL DZVll'S SELECTED GENERATED 
BOTH TRANSMIT AND RECEIVE INTERRUPTS, THE APPROPRIATE 
BIT IS DONFLG FOR THAT DZVll WILL BE CLEARED. IF 
THIS DOES NOT OCCUR IN THE GIVEN TIME, THE DEVICE 
NUMBER OF THE OFFENDING DZVll iILL BE CALCULATED, 
AND THIS WILL BE REPORTED IN A MODULE MESSAGE. THE 
OFFENDING DEVICE IS DROPPED FROM THE EXERCISE. IF 
NO MORE DZVll 'S ARE SELECTED^ THE MODULE ITSELF IS 
DROPPED FROM THE RUN. IF MORE REMAIN TO BE EXERCISED, 
HOWEVER, CONTROL IS TRANSFERRED TO "FINISH." 



DZBC DEC/Xll SfSfEM EXERCISER MODULE 
XDZBCO.Pll 12-0CT-78 lll58 



MACYll 301(1052) 12-OCT~-78 16235 PAGES 



SEQ 0004 



FIMISHS CONTROL COMES HERS IF ALL SELECTED DZVll'S SERE 
SOCCESSFULLY EXERCISED OR IF MORE DZVll'S REMAIH 
AFTER 08E MAS HUNG. THE ITERATION CO0MT IS DECREASED. 
IF THE COUNT DOES NOT REACH ZERO^ CONTROL IS PASSED 
TO SETUP2 AMD THE MODULE IS RUN AGAIN. MHEN THE 
COUNT REACHES ZERO^ AN END OF PASS IS SIGNALLED. 

XMTIiTS THIS SEGMENT SAVES A POINTER TO THE CSR ADDRESS OF 
THE INTERRUPTING DZVll IN A FIRST-IN^ FIRST-OUT^ 
WRAPAROUND BUFFER^ THE TRANSMITTER QUEUE. THE ENTRY 
POINTER IS THEN UPDATED TO POINT TO THE NEXT ENTRY 
IN THE QUEUE. SERVICE IS DEFERRED TO LEVEL ZERO 
PRIORITY. 

XMTSRVS THIS BLOCK FETCHES A POINTER TO A CSR ADDRESS 

FROM THE TRANSMITTER QUEUE^ AND THE QUEUE IS UPDATED 
TO THE NEXT ENTRY. THE CSR IS TESTED TO DETERMINE 
MHAT KIND OF INTERRUPT OCCURRED. FALSE INTERRUPT IS 
REPORTED. IF EVERYTHING IS CORRECT, THE ADDRESS OF 
THE BYTE ASSOCIATED WTH THIS LINE (IN THE TRANSMITTER 
BUFFER > IS CALCULATED. A CHARACTER IS TRANSMITTED 
ON THIS LINE. TRANSMITTER INTERRUPTS ARE REENABLED 
FOR THIS DEVICE, IF MORE CHARACTERS ARE TO BE TRANS- 
MITTED. IF NO MORE ARE TO BE SENT OH THIS LINE, A 
BIT POINTER IS BUILT AND THE TRANSMITTER IS DISABLED. 
IF ALL LINES ARE DISABLED,THE RECEIVER FOR 
THIS DZYll IS ENABLED. 

RCVINTi THIS SEGMENT SAVES A POINTER TO THE CSR ADDRESS 
OF THE INTERRUPTING DZVll IN THE RECEIVER QUEUE. 
IT DISABLES FURTHER INTERRUPTS FOR THIS DEVICE. 
IT UPDATES THE QUEUE ENTRY AND RESTORES THE VALUE 
OF R5 WHICH WAS SAVED BY THE JSR INSTRUCTION FROM 
THE LINKAGE TABLE. 

RCVSRVS THE FIRST TASK IS TO PREVENT VOLATILE REGISTER 
INFORMATION FROM BEING DESTROYED. THIS IS DONE 
BY TESTING A SEMAPHORE, "LCKOUT.« IF IT IS SET, 
CONTROL IS RETURNED TO THE MONITOR TO WAIT FOR 
A WHILE. IF IT IS CLEAR, ACCESS IS PERMITTED. THE 
FLAG IS SET TO DENY OTHER ACCESSES TO THIS DEFERRED 
ROUTINE. A CSR ADDRESS IS OBTAINED FROM THE QUEUE^ 
AND THE QUEUE ENTRY IS UPDATED. THE RECEIVER INTERRUPT 
AND INTERRUPT ENABLE ARE CLEARED. THE REGISTERS ARE SET 
UP TO RETRIEVE AS QUICKLY AS POSSIBLE THE DATA FROM 
THE DZVll SILO. EACH FETCH IS CHECKED TO SEE IF THE 
INFORMATION IS VALID. IF IT IS NOT, THE REGISTERS 
ARE SAVED AND A BREAK LOOP IS USED TO ALLOl MORE 
TIME FOR VALID INFORMATION TO BECOME AVAILABLE. 
IF AFTER THE ALLOTTED TIME ALL THE CHARACTERS ARE 
STILL NOT RECEIVED, AN ERROR MESSAGE IS REPORTED. 
IN THE MESSAGE, TWO NUMBERS ARE GIVEN. THE FIRST 
IS THE NUMBER OF CHARACTERS THAT WERE TRANSMITTED 
(IN OCTAL). THE NEXT IS THE NUMBER OF CHARACTERS 
THAT WERE NOT RECEIVED (ALSO IN OCTAL). 



DZBC DEC/Xll SYSTEM EXERCISER MODULE MACYll 301(1052) 12-OCT-78 16235 PAGE 6 
XDZBC0»P11 12-0Cf-78 lls58 

CKDAfIS THIS SEGMEMT INITIALIZES THE LINE CHECK BUFFER 

CLMCICBF) TO THE FIRST DATUM THAT WAS TRANSMITTED- 

THE DEVICE NUMBER IS SAVED FOR LATER USAGE. THE 

RECEIVED INFORMATION IS CHECKED FOR VALIDITY 

AND TRANSMISSION ERRORS. ERRORS ARE HANDLED BY THE 

'STATERR* (STATUS ERROR) AND 'DERROR' (DATA ERROR) 

ROUTINES. 

RCVDONES THIS BLOCK CLEARS THE ACCESS SEMAPHORE TO ALLOW 
OTHER DEVICES TO USE THE LINE CHECK BUFFER. IT 
ALSO DISABLES THE DEVICE MITH A DEVICE CLEAR. IT 
THEN BUILDS A ONE BIT MASK USING RO AND THE 
CARRY BIT TO DELETE THE APPROPRIATE BIT IN THE 
WATCHDOG TIMER FLAG (DONFLG). WHEN THIS IS DONE, 
PROCESSING CONTROL IS RETURNED TO THE MONITOR. 

SUBROUTINES 

VCTLOADJ THIS ROUTINE IS CALLED IN "SETUPl'. IT IS USED 

TO LOAD THE ADDRESS OF THE LINKING INSTRUCTION FOR 
INTERRUPT SERVICING INTO THE CORRESPONDING VECTOR 
SPACE. IT ALSO LOADS THE PRIORITY LEVEL AND THE 
DEVICE ADDRESS. THE LATTER IS LOADED INTO THE 
APPROPRIATE JSR TABLE ENTRY. 

SAVREG2 THIS ROUTINE SAVES THE FIVE VOLATILE INFORMATION 
REGISTERS IN A FIRST-IN, FIRST-OUT MRAPAROOND 
BUFFER, THE ERROR QUEUE. 

GBTREGS THIS ROUTINE RETRIEVES THOSE SAME REGISTERS. 

GETLINE2 THIS ROUTINE CALCULATES HOU MANY CHARACTERS MILL 
BE TRANSMITTED FOR EACH DEVICE DURING AN ITERATION 
OF THE PROGRAM. EIGHT CHARACTERS ARE SENT ON EACH 
SELECTED LINE IN ONE ITERATION. THE TOTAL COUNT 
IS STORED IN 'XMTCNT'. 

BAUDRTE5 THIS ROUTINE CALCULATES THE BAUD RATE, ASSIGNS 
IT* AND SELECTS 8 BITS/CHARACTER COMMUNICATION 
MODE. IF SR1=0, THE DEFAULT RATE OF 9600. BAUD 
IS ASSIGNED. THE BAUD RATE SELECTED IS DETERMINED 
BY THE LEAST SIGNIFICANT (RIGHTMOST) SET BIT IN SRI. 

STATERR: THIS ROUTINE DETERMINES WHETHER AN ERROR INDICATED 
IN THE RECEIVED CHARACTER INFORMATION iAS AN 
OVERRUN ERROR, A FRAMING ERROR, OR A PARITV ERROR. 
THE DEVICE NUMBER OF THE ERRING DEVICE IS REPORTED 
AS STATC. CSRA WILL BE CLEAR. 

DERROR: THIS ROUTINE REPORTS A DATA ERROR. 



8. OPERATOR OPTIONS 
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SEQ 0006 



CMMD) TO EXERCISE 



HODOLE LOCATION DVIDl (APC=14) MAY BE MODIFIED (MOD, 
AMY COMBIKATIOH OF EIGHT DZVll'S, 

fiODOLE LOCATIOM SRI (APC=16) MAY BE MODIFIED TO SELECT A DIFFEREMT BAUD R^TE. 
THE iFOLLOiilMG TABLE SHOULD BE USED 2 

FOR THE BAUD RATE SR1= 
7200 
4800 
3600 
2400 
2200 
1800 
1200 

600 

300 

150 

134.5 

110 

75 
50 

CUSIHG THESE YALOES MILL YIELD All EMD OF PASS CLOSE TO QUE MINUTE FO EACH BAUD RATE* ) 

THE DEFAULT RATE IS 9600 BAUD(SR1=0)- 

MODULE LOCATION SLCTLIH MAY BE MODIFIED TO RUM AiY 
COMBINATIOli OF FOUR LINES. THE COMBINATION IS THEN RUN ON 
ALL SELECTED DEVICES. THE DEFAULT SELECTION IS ALL FOUR LINES. 
N0TE2 SLCTLIN FALLS ON A BYTE BOUNDARY!! BE SURE 

TO RESTORE THE BITS SET IN THE OTHER BYTE II! 

MODULE LOCATION ICONT MAY BE MODIFIED TO VARY THE PERIOD BETWEEN END OF PASS REPORTS^ 

MODULE LOCATIOM TMRSET *2 MAY BE MODIFIED TO VARY 

THE PERIOD OF THE WATCHDOG TIMER. IT IS PRESENTLY SET TO EXPIRE 

AFTER SEVENTY-FIVE SECONDS WHEN DZB IS RUNNING ALONE* 





LOC 276= 


1 


2060 


2 


2000 


4 


1730 


10 


1460 


20 


1350 


40 


1350 


100 


1200 


200 


630 


400 


330 


1000 


150 


2000 


144 


4000 


120 


10000 


70 


20000 


45 



9« 



NON-STANDARD PRINTOUTS: 



MHEN A STATUS ERROR IS DETECTED^ DZB USES THE ERRORN 
CALL TO REPORT IT. THE FIRST NUMBER GIVEN IS THE NUMBER 
OF THE DEVICE (0 TO 7). THE SECOND IS THE CONTENTS OF 
THE READ BUFFER CDZRDBUF= CSR -i- 2,E. G., 160042 ) . 

MHEN ALL CHARACTERS ARE NOT RECEIVED, AN ERRORN CALL IS RE- 
PORTED. THE FIRST NUMBER IS THE NUMBER OF CHARACTERS EXPECTED. 
THE SECOND IS THE NUMBER OF CHARACTERS THAT MERE NOT RECEIVED. 



ALL OTHER PRINTOUT IS STANDARD. 



DZBC DEC/Xll SfSfEM EXERCISER MODULE MACYll 30A(1052) 12-0CT-78 16s35 PAGE 8 
XDZBC0«P11 12-OCT-78 11258 



SEQ 0007 



10« MSEMOilCS 



THE FOLLOHIIIG liFORMATIOi SHOULD BE USEFUL li UiOERSTIiDIIiG 
iAMES GItEi TO ¥ARIABLES li THIS PROGRAM* 

XMT REFERS TO THE TRANSMITTER 
RC? REFERS TO THE RECEIVER 

ERR REFERS TO AMYTHIKG TO DO MITH ERROR HAUDLIHG 

FLG REFERS TO A SOFTWARE FLAG^ USUALLY A BIT FLAG 

QUE REFERS TO A FIRST IM^ FIRST OUT BUFFER 

TMR REFERS TO SOFTWARE TIMIMG FUNCTIONS 

CMT REFERS TO A WORD USED AS A COUNTER 

QP REFERS TO A POUTER ASSOCIATED WITH A QUEUE BUFFER 

I IS Ai INSERTION POINTER^ IS AN OUTPUT POINTER 
Lli REFERS TO SOMETHING INVOLVING A GIVEN LINE 
XM IS ANOTHER REFERENCE TO TRANSMITTER 
CT GENERALLY REFERS TO A COUNT 

E«GSXMTQPO=TRANSMITTER QUEUE POINTER OUT 

OTHERS ARE BASICALLY SELF EXPLANATORY, 



I 
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»TITLE 
DDXCOM 



055104 041502 
000 



umr- 



0001^ . 
000116' 



DZBC DEC/Xll SYSTEM EXERCISER MODULE 

VERSIOH 6 23-MAY-78 

-LIST BIN 

»* ft*** ft* **ft**«***irft»*a«i*aft**&ft*AS*****«at4***a**A***a ft 

BEGIli: 

040 MODMAHS .ASCII /DZBC / >MDDOLE NAME. 
DPEM — 



1*0 
i+0 




PRTY4+0 
PRTY44-0 



* ft* ************ 



******** 



icooht: 

SOFCNTI 

hrdcnt: 

SOFPAS: 
HRDPAS: 

syscht: 
rannum: 

COMFIGS 
RESl: Q 
RES2: 
SYRI 

svr: 
syr: 
svr: 



000002 



SVR4: 
SVR5: 
SYR6: 
CSRA: 
SBADR: 
ACSR: 
HASADR: 
ASTAT: 
ERRTYP: 

asb: 

AWAS : 

rstrt: 

SDTO: 

udfr: 

IHTR: 

IDNUH! 

MOiSP! 



_ ADDR. 
;1ST DEVICE VECTOR. 
;1ST BR LEVEL. 
?2ND BR LEVEL. 
;DEVICE INDICATOR 1. 
;SWITCH REGISTER 1 
JSHITCH REGISTER 2 
;SttITCH REGISTER 3 
;S«ITCH REGISTER 4 
***************************< 

;STATUS WORD. 

;MODULE START ADDR. 
;H0DULE STACK POINTER. 

;pass counter. 

;# of iterations per pass=2140 
;loc to count iterations 
;lqc to save total soft errors 
;loc to save total hard errors 
;loc to save soft errors per pass 
?loc to save hard errors per pass 
;l of sys errors accumulated 
>holds random # when rand macro is ca 
;reserved for monitor use 
;reserved for monitor use 
;r£served for monitor use 
;LOc TO save ro. 

;LOC TO SAVE Rl. 

;loc to save R2. 
;LOc to save R3. 
;loc to save r4. 
;Loc to save R5. 
;loc to save R6. 
;addr of current csr. 
;addr of good data, or 
;contents of csr. 
;addr of bad data, or 
;status reg contents. 
;tvpe of error 

^EXPECTED data. 

;actual data. 

;restart address after end of pass 
?words to memory per iteration 
/words from memory per iteration 
;# of interrupts per iteration 

;M0DULE IDENTIFICATION NUMBER=142 
********************************************************* «**j 
RBDF=2 ;DEFINITI0N OF MODE 6 OFFSET TO THE 



OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 

OPEN 

OPEN 

OPEN 

OPEN 

RESTRT 

OPEN 

OPEN 

OPEN 

142 



**** 

READ BUFFER 
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000002 
000004 
000006 

000020 
000040 

Si°8i88 

040000 
010000 
000030 
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LPR=2 
TCR=4 
MSR=6 
TDR=6 

MAIMT=BIT3 

DCLR=BIT4 

MSENAB=BIT5 

RIE=BIT6 

SILaEN=BIT12 

TIE=BIT14 

RCV0N=BIT12 

EIGHT=BIT4IBIT3 



;M0DE 6 OFFSET TO THE LINE PARAMETER REGISTER 
;OFFSET TO THE TRANSMITTER CONTROL REGISTER 
;OFFSET TO THE MODEM STATUS REGISTER 
;OFFSET TO THE TRANSMITTER DATA REGISTER 
;ENABLE MAINTENANCE MODE BIT 
JDEVICE MASTER CLEAR 

;ENABLE THE MASTER SCANNER (DEVICE GO) 
^RECEIVER INTERRUPT ENABLE 
;SILO ALARM INTERRUPT ENABLE 
?TRANSMITTER INTERRUPT ENABLE 
;TURN THE RECEIVER ON (RECEIVER GO) 
;EIGHT BITS/CHARACTER SELECTION 
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>THESE ARE THE PROGRAM PARAMETERS 



LINPAR: 
TMRCNT: 

rcvtmr: 

DVCNHBR: 
XMTCHT: 

LNXMCT: 
BGNDATA! 
RCVtfORD: 
MI SSI 
DATA: 

select: 

SLCTLIfJ; 

dqnflg: 
RCVDATA: 
LCKOUT: 
TEMPI: 



OPEM 

OPEN 

OPEH 

OPEN 

OPEN 

-BLKB 

OPEN 

OPEN 

OPEN 

.BYTE 

.BYTE 

.BYTE 

.BYTE 

.BYTE 

.BYTE 

.tilORD 

.EVEN 



OPEN 
OPEN 
17 

OPEN 

OPEN 
OPEN 




;scratchword used to load line parameter registers 
^counter for watchdog timer 
^receiver break loop timer 
;number of device being processed 

;CCUNTER of total NUMBER OF TRANSMISSIONS 
JTRANSMISSION COUNTERS FOR EACH DEVICE 

;TSia COPIES OF THE FIRST CHARACTER IN TRANSMIT PATTERN 

JUSED TO REPORT RECEIVER ERROR 

;USED TO REPORT NUMBER OF CHARACTERS MISSING 

;CHARACTER BUILDING BYTE 

;ACTIVE DEVICE SELECTION PARAMETER 

;ACTIVE LINE SELECTION PARAMETER 

J^iATCHDOG FLAG FOR BUSY DEVICES 

JBUFFER FOR CHARACTER CHECKING 

;BUFFER ACCESS FLAG 

^TEMPORARY STORAGE FOR ASCII CONVERSION 
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000314 
000320 



105067 
116767 



001002 
104410 
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;START ROUTINE. DETERMINE IF ANY DZV 'S ARE SELECTED 

;IF SO, BEGIN MODULE PROCESSING... IF NOT, DROP THE MODULE FRQK THE RUN 



177764 

177470 177757 



002524' 003262 

002524' 003256 

002544' 003252 

002544' 003246 

002564' 003242 

""2564' 003236 

-2524' 
000473 



177601 
000236' 



CLRB 
MOVB 



DATA 

DVIDl, SELECT 



BNE RESTRT 
ENDS, BEGIN 



JINITIALIZE THE DATA PATTERN WORD 

;COPY THE DEVICE SELECTION PARAMFTER. ARE 

/ANY DEVICES SELECTED? 

;IF SO, BEGIN PROCESSING. IF NOT, DROP THE MODULE 
;DR0P the MODULE 



;INITIALIZE THE NUMBER OF PASSES TO BE MADE. SET UP THE DZVll INTERRUPT 
;VECT0RS to INTERRUPT IN THE SUBROUTINE LINKING TABLE. CALL SUBROUTINE 
;VCTLOAD FOR THIS PURPOSE. 



RESTRT: 
SETUPl: MOVB 

BEQ 



MOV 

MOV 

MOV 

CLC 

RQRB 

BCS 

BEQ 

ADD 



is: 



2$: 
3$: 



ADD 
ADD 



JSR 
BR2 



JSR 
BRl 



SELECT, Rl 
DROP 

VECTOR^RO 
A0DR,R2 
SLNKT AB,R3 

Rl 

siTUP2 
#10, RO 

#20,R3 
|lO,R2 



rI,v 



R5,VCTL0AD 
2$ 



;c0py the device selection parameter into rl 

;if no devices selected (all flags clear) drop the 

;module 

JLOAD THE VECTOR ADDRESS IN RO 

JLOAD R2 WITH ADDRESS OF FIRST DZll 

;POINT R3 TO THE BEGINNING OF JSR LINKING TABLE 

?MAKE SURE CARRY BIT IS CLEAR BEFORE ROTATION 

;ISOLATE A SELECTION FLAG IN THE CARRY BIT 

;IF THE FLAG IS SET, GO SET UP THE VECTORS 

MF NO FLAGS ARE LEFT, GO SET UP THE BUFFERS 

;IF MORE FLAGS ARE SET, ADJUST POINTERS. THE 

;VECTOR POINTER... 

;THE LINKAGE TABLE POINTER... 

;AND THE ADDRESS POINTER 

;GD SET UP THE NEXT DZVll ADDRESSES 

;CALL THE VECTOR SETUP ROUTINE FOR RECEIVER 

;VECTOR, PASSING THE RECEIVER BR LEVEL AS THE 

;ARGUHBNT 

;SET DP THE TRANSMITTER VECTOR PASSING THE 
;TRANSMITTER BR level AS THE ARGUMENT 
;Ga SETUP THE NEXT DZVll 



;THIS BLOCK RESETS ALL THE QUEUE POINTERS, 
;RECEIVER BUFFERS, AND THE QUEUES. THIS IS 
;PROGRAM. 



CLEARS THE TRANSMITTER TEXT BUFFER, THE 
THE BEGINNING OF THE ITERATIVE PART OF THE 



SETUP2: 


! MOV 




MOV 




MOV 




MOV 




MOV 




MOV 




MOV 




MOV 


1$: 


CLR 


DEC 




BNE 




CLRB 




MOV 



#XMTQUE,XMTQPI 
tfXMTQDE, XMTQPO 

iRCVQUE,RCVQPI 
RCVQUE/RCVQPO 
ERRQUE,ERRQPI 
ERRQUE,ERRQPO 
XMTQUE-RS 
315. ,R4 
R3)-»- 
4 

LCKOUT 
#LNXMCT,R3 



;POINT THE TRANSMIT QUEUE ENTRY (IN) POINTER 
;T0 the BEGINNING OF THE QUEUE 

;point the transmit queue retrieval (out) 
;pointer to the beginning of the queue 
jset up the receiver queue pointers 

;setup the error queue pointers 

;point r3 to the beginning of the queue area 

jusing r4 as a counter clear - 

;transmitter, receivers, and error queues.... 

;transmitter text buffer... 

;receiver silo buffers 

?clear the buffer access flag 

;P0INT to the CHRACTER counter FOR EACH LINE 
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052711 
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MOV #32.#R4 >SET UP 32. BYTE POINTERS 

2$: MOVB |8.,(R3)+ ;SET UP THIS BYTE AND POINT TO THE NEXT ONE 

DEC R4 ;REDUCE THE COUNT. ARE 32. BYTES SET UP? 

BNE 2$ ;IF NO/ GO SET UP THE NEXT ONE 



;THIS BLOCK SETS THE WATCHDOG TIMER FLAG/ 
JAHD BAUD RATE FOR THE ACTIVE DZVllS 



INITIALIZES THE DZVll CONDITIONS, SETS THE CHA 



ACTVATEtMQVB 
MOVB 
MOV 

1$: RORB 
BCS 
BEQ 
ADD 
BR 
MOV 
MOV 
MOV 
JSR 



2$: 



000002 4$! 



BIS 
MOV 
DEC 
BEQ 
INC 
BR 



SELECT, RO 
RO^DONPLG 
ADDR,R1 
RO 

lilTIAL 
|10,R1 

iOCLR,(Rl) 
r6v0N! EIGHT, LI 
C,BAUDRTE 
«MAINT,(R1) 
LINPAR,LPR(R1) 



/COPY THE DEVICE SELECTION PARAMETER 
;SET THE WATCHDOG TIMER DEVICE COMPLETION FLAG 
;LOAD THE ADDRESS OF THE FIRST DZVll 
MSOLATE A SELECTION FLAG IN THE CARRY BIT 
/IF SELECTED/ GO SET UP THE DEVICE REGISTERS 
;IF NO MORE SELECTED/ GO SET UP THE DATA 
;POINT Rl TO THE NEXT DZVll 
;PROCESS NEXT DZVll 
;MASTER CLEAR THIS DZVll 
;USE R2 TO COUNT 4. LINES BEING SET UP 
NPAR JSET DP NO PARITY/ EIGHT BITS/CHAR. 
;G0 CALCULATE THE BAUD RATE TO BE USED 
JENABLE MAINTENANCE MODE OPERATION 
;SET UP THIS LINE'S PARAMETERS 
;REDUCE THE COUNT. ARE ALL 4. LINES SET? 
;IF YES/ GO PROCESS NEXT DZVll 

;IF NO/ INCREMENT THE LINE SELECTION PARAMETER 
;G0 SET UP THE NEXT LINE 



;THIS BLOCK SETS UP THE TRANSMITTER TEXT WITH THE TEST DATA 
;RECEIVER AMD EACH TRANSMITTER SELECTED 



IT THEN STARTS EACH 



INITIALIMOV 

MOVB 



040040 

177354 000004 



1$: 



2$: 

3$: 
4$: 



MOV 

MOVB 

DEC 

BNE 

ADO 

MOVB 

MOVB 

MOV 

JSR 

CLC 

RORB 

BCS 

BEQ 

ADD 

BR 

BIS 

MOVB 

BR 



PMTBOF/Rl 
DATA/RO 
RO/BGNDATA 
R0,BGNDATA+1 

R2 

II.^RO 
RO/DATA 
SELECT, RO 
ADDR/Rl 
PC/GETLINE 

RO 

tIrset 

||0/R1 

ftllEIMSENAB,(Rl) 
SLCTLIN/TCR(R1) 



;POINT Rl TO THE START OF THE BUFFER AREA 
;BEG1N SETTING UP THE CHARACTER PATTERN 

;copy the first datum being transmitted in this 
;group .bgndata will be used td set 

;UP LMCKBF(THE line CHECK BUFFER ) IN THE CKDATA ROUTINE 
;OSE R2 TO COUNT THE LOOP ITERATIONS 
;PUT A CHARACTER IN THE BUFFER 

;REDUCE COUNT. HAVE ALL CHARACTERS BEEN MADE? 

;IF NO/ GO LOAD THE NEXT CHARACTER 

;POINT TO THE BEGINNING OF THE NEXT PATTERN 

;SAVE THAT PATTERN BEGINNING 

;COPY THE DEVICE SELECTION PARAMETER 

?LOAD THE ADDRESS OF THE FIRST DZVll 

/FIND OUT HOW MANY LINES ARE RUNNING 

;NAKE sure carry BIT IS CLEAR BEFORE ROTATION 

;IS0LATE A SELECTION FLAG IN THE CARRY BIT 

;IF SELECTED/ GO START THE DEVICE 

;IF NO MORE SELECTED/ GO START WATCHDOG TIMER 

JPOINT Rl TO THE NEXT DZVll 

;G0 PROCESS THE NEXT DZVll 

;ehable transmitter interrupts 

;enable the transmitters for ail selected lines 

;PRaCESS THE next DZVll 
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?THIS IS THE WATCHDOG TIMER. WHEN h DEVICE HAS SUCCESSFULLY TRANSMITTED AND 
;RECEIVED ALL DATA. IT CLEARS ITS CORRESPONDING BIT IN DONFLG. IF THIS 
;D0ES NOT OCCUR, A MODULE MESSAGE IS REPORTED. IF MORE DEVICES ARE TO BE 
;PROCESSED, THIS ITERATION IS CONSIDERED COMPLETE. IF NO DEVICES REMAIN TO BE 
;PROCESSED, THE MODULE IS DROPPED. 



000736' 
000744' 
000746' 
000746' 
000752' 



mm- 

000766' 
000770- 
000774' 



0010 
0010 



001012' 



001014' 
001016' 



012767 
005004 



104407 
104407 
105767 

001367 
005367 
001363 

116703 

140367 
006003 

103402 

005204 

000774 
010467 



000005 177262 



000000' 
000000' 
177325 



THRSET: MOV 
TIMER: CLR 

BREAK* 
BREAK^ 
TSTB 



DEC 
BNE 
DEC 
BNE 



001044' 004767 00076 
001050' 105767 17723 
001002 



177305 

mm 



000000- 000312' 



2$: 



3$: 



001056- 104410 000000- 
001062' 

001062' 104413 000000' 

001066- 000167 177436 



BICB 
RQR 

BCS 

INC 

BR 
MOV 



#5/TMRCNT ?SET THE TIMER COUNT FOR THE BREAK LOOP 

R4 >0SING R4/ RETURN TO MONITOR 65535 TIMES 

/BEGIN ;TEMP0RARY RETURN TO MONITOR 

/BEGIN ;THEN CONTINUE AT NEXT INSTRUCTION. 

DONFLG ;IF DONFLG IS CLEAR, EACH SELECTED DEVICE WAS 
;SUCCESSFUL 

FINISH ;IF SO, PERFORM ENDPASS PROCESSING 

R4 ;IF NOT/ REDUCE COUNT AND BREAK AGAIN 

1$ JBRBAK IF COUNT NOT EXCEEDED 

TMRCNT JREDUCE THE OVERALL TIME. IS IT EXCEEDED? 

TIMER ;IF NO, START ANOTHER BREAK LOOP 

D0HFLG,R3 ;IF TIMEOUT OCCURRED, SAVE THE REMAINING FLAG 

R3, SELECT ;CLEAR"tHE SELECTION FLAG FOR THIS DEVICE 

R3 ;DETERHINE WHICH DEVICE HAS READ FOR REPORTING 

JPURPOSES 

3$ ;IF THIS IS THE DEVICE, R4 CONTAINS THE CORRECT 

;HNE NUMBER... GO REPORT IT 
R4 ;IF HOT, INCREMENT R4, WHICH WAS INITIALLY 

?FROM THE PREVIOUS LOOP 
2S ;G0 SEE IF THIS IS THE DEVICE 

R4, TEMPI ;THE DEVICE NUMBER WILL BE REPORTED AS STATC 

** fe ************** ft 1k***1i*ittc**il*1i*1t*1eit-k** ****** ******** 



0T0A$,BEGIN,TEMP1,M2 
« ******************** 
JSR PC/SAVREG 
MSGN$, BEGIN, HUNG 
JSR PC,GETREG 
TSTB SELECT 
BNE FINISH 

END$, BEGIN 



;CONVERT TEMPI TO ASCII 
; STORE AT M2 



***************************** 



i************ 



;SAVE THE REGISTERS BEFORE LEAVING THE MODULE 

;ASCII MESSAGE CALL WITH COMMON HEADER 

;RESTORE THE PREVIOUS REGISTER VALUES 

;ARE THERE ANY DEVICES STILL ACTIVE? 

;IF YES, REDUCE COUNT AND CONTINUE 

?1F NO, DROP THE MODULE 

;DR0P THE MODULE 



;THIS BLOCK REDUCES THE ITERATION COUNT AND GOES TO ACTVATE IF THE COUNT IS NOT EXCEEDED 
FINISH! 



ENDITS/BEGIH 
JMP ACTVATE 



;SIGNAL END OF ITERATION. 
;M0NIT0R SHALL TEST END OF PASS 
JIF NO, START PROCESSING AGAIN 



JTRAHSMITTER INTERRUPT SERVICE ROUTINE 
;THIS ROUTINE STORES THE ADDRESS OF THE CSR POINTER (OFFSET IN THE JSR LINKAGE 
;TABLE) in THE TRANSMITTER QUEUE 

; THE ROOTIHE THEN ENABLES INTERRUPTS FOR THE CORRESPONDING RECEIVER 
;AHD RETURNS CONTROL TO THE MONITOR. 



DZBC DEC/Xll S¥S 
XDZBCO-Pll 12 



i 



mil 



TEM EXERCISER MODULE 
l-OCt-78 11SS8 



IfB 002S24' 002570 



000004 000000' 001132' 



2545 
002524* 002532 



76704 
-1702 
566 

Oil 176674 



104405 000000* 000000 
0Q4767 
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KMTINTS 



1$! 



2$i 



3$: 
4$: 



000006 5$: 



MOV 
ADO 
CMP 



HIS 
OV 



mm 

IXMtQUi+16,X 



MOV 
MOV 



IRQ$/BEGIN,XHTSRV 




XJISPl 

rXMTQP 



{ j8as"the 
;IF NO 



THE OPFS.. _ 
E fHE QUEUE ENTRY .„....„.. 

"~ UEUE BOUNDARY BEEN EXCEEDED? 



.T TO THE CSH INTO TRANSMITTER QUEUE 

E QUEUE ENTRY POIMTER 



Q, COMfIN 



NUE PROCESSING 

~ THE POINTER TO GUEUE BEGINNING 
REVIOUS R5 VALUE 



QUEUE UP TO CONTINUE AT XMTSRV AND RTI 



XMTQPO^Rl 
2#XMTQP0 
XMTQUB+16,XMTQP 

MTQUE/XMTQPO 



;FETCH THE OFFSET FROM THE QUEUE 
iUPDATE THE QUEUE RETRIEVAL POINTER 
;HAS THE QUEUE BOUNDARY BEEN EXCEEDED? 
./ — ---flNUE PROCESSING 



EGINNING OF THE QUEUE 



KUfCSRA 
^RD||-ACSR 



;ll NO, CONTINUE PROCESSING 
;IF YES/ RESET POINTER TO B 
;LOAD CSR ADDRESS INTO RO 
;IS THIS A VALID INTERRUPT? 
;IF YES/ GO ENABLE RECEIVER INTERRUPT 
;IF NOy SET UP THE CSR ADDRESS FOR ERROR REPORTING 
;SET UP THE CONTENTS 

JSAVE THE REGISTERS BEFORE ERROR MESSAGE 



JSR PC^GETREG 
EXITS/BEG^N 



(*#«***** ************ ******** 



ill^il*i^lliS^II*ii§Hiil*IS8LI§ISi^iniP 



MOVB 
BIC 
MOV 
ASL 
ASL 
ADD 
BIC 
TSTB 
BHE 
MOVB 
MOV 
DEC 
BMI 
ASL 
BR 
BIC 
BNE 

IF 

MOVB 
INCB 
DECB 
BIS 



(Rl)/R3 



??^14;R2 



;GET THE LI 
; ISOLATE TH 
;GET THE NU 



. |jR3 

Enxh6t(r1) 

|i.|^LNXMCT(R3) 

4S 
Rf 
3$ 

R3,TCR(R0) 

||ie,<ro) 
xmtbuf(r3),tdr(r 



;RESTDRE THE REGISTERS 

;EXIT to MONITOR. MODULE WAIT FOR INTERRUPT. 

line number from the high byte of csr 
the line number in r2 

- number of this device 

^multiply the device number by four 
;this involves multiplying it by two twice 
^calculate this line's table offset 
jdisable interrupts before an overrun occurs 
;all crarac. transmitted? 
;if not go load buffer 
;if so, reset the count of characters 

;SET A BIT POINTER IN R3 
JUSE R2 AS A COUNT OF ROTATIONS TO MAKE 
;IS THE POINTER NOW AT THE RIGHT LINE? 
;IF NOT, POINT IT TO THE NEXT LINE 
;G0 SEE IF THIS IS THE LINE 

;IF so* DISABLE TRANSMISSIONS ON THIS LINE 
;IF MORE TRANSMITTERS ARE ACTIVE, GO EXIT 



XMTBUF^Rs] 
LNXMCT(R3) 
#TIE,<RO) 



104400 000000' 



EXITS, BEGIN 



;OTHERHISE, ENABLE THE RECEIVER 
;SKIP RESETTING THE INTERRUPT ENABLE 
0) ;L0AD THE CHAR INTO TRANS BUFFER 

>create next character 

;count a charac. for this line 

;restart trans, interrupts 

;EXIT to MONITOR. MODULE WAIT FOR INTERRUPT. 
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SEQ 

JRECEIVER INTERRUPT SERVICE ROUTINE 
;THIS ROUTINE STORES A POINTER TO THE CSR ADDRESS OF THE INTERRUPTING DEVICE IN THE 
^RECEIVER QUEUE. SERVICE IS DEFERRED TO PRIORITY LEVEL 0. AT DEFERRED SERVICE (RCVSRV), 
;THE offset IS FETCHED FROM THE QUEUE. _THE INTERRUPT AND INTERRUPT ENABLE PITS ARE 
JCLEARED AND THE SILO IS EMPTIED INTO THE SOFTWARE BUFFER. IF ALL CHARACTERS 
;WERE NOT RECEIVED, THIS IS REPORTED. CHECK THE BUFFER AND REPORT DATA ERRORS. IF 
;ANOTHER RECEIVER IS ALREADY USING THE LINE CHECK BUFFER (LNCKBF), SUBSEQUENT 
;RECEIVERS WILL NOT BE PERMITTED ACCESS UNTIL THE FIRST IS COMPLETE. IF THERE 
;ARE ANY CHARACTER ERRORS REPORT THEM. WHEN ALL DATA IS CHECKED, IT RELEASES 
;THE LINE CHECK BUFFER AND CLEAR THE CORRESPONDING BIT IN DONFLG. 



RCVINT: 



002330 
002322 



002246 
002240 

002230 



if! 



RCVQPI 
,ia(R5) + 



ADD 

CMP 

BHIS 

MOV 

MOV 



;STORE THE OFFSET IN THE RETRIEVAL QUEUE 
JDISABLE THIS RECEIVER'S INTERRUPTS BEFORE 
JITS OTHER LINES OVERRUN THE QUEUES 
■UPDATE THE QUEUE ENTRY POINTER 



:RCVQUE+16, RCVQPI JHAS THE QUEUE BOUNDARY BEEN EXCEEDED? 
S JIF NOT, CONTINUE PROCESSING 
ftCVQUE, RCVQPI JRESET THE POINTER TO QUEUE BEGINNING 
SP)-«-,R5 " • " 



JRESTORE THE PREVIOUS VALUE OF R5 



^iRQiriEGINlRCVSRv' 



lis: 



1$: 



2$: 



3$: 



IsTB 
BEQ 
BREAK< 
BREAK? 
BR 

COMB 

MOV 

ADD 

CMP 

BHIS 

MOV 

MOV 

BIC 

MOV 

MOV 

MOV 

MOV 

BGE 

DEC 

BNE 

BR 

TST 

JSR 

BREAK* 

BREAK? 

JSR 

DEC 

BPL 

MOV 

MOV 

MOV 

JSR 



QUEUE UP TO CONTINUE AT RCVSRV AND RTl 



lis 
,begIn 

/BEGIN 
RCVSRV 
LCKOOT 



PCVQP0,R0 
i2,RCVQP0 I 

|rcvque-»-16,rcvqpo 



|rcvque,rcvqpo 

(R0)+,R1 
#30300, (Rl)+ 

RCVTMR 



MTCNT,R3 
|R13,(R2)^- 

R3 
2$ 

CKDATA 

pJ^SAVREG 
/BEGIN 
/BEGIN 

PC/GETREG 

RCVTMR 

2S 

-(RO)/CSRA 

irgfss*"'' 

K-3 / n X a a 

PC/SAVREG 



TEST THE BUFFER LOCK FLAG. IS ACCESS PERMITTED? 
IF YES, GO SET THE LOCK AND CHECK THE DATA 

TEMPORARY RETURN TO MONITOR 

THEN CONTINUE AT NEXT INSTRUCTION. 
TRY TO ACCESS AGAIN 
DENY OTHER ACCESSES TO THE BUFFER 
FETCH THE OFFSET FROM THE QUEUE 
UPDATE THE QUEUE RETRIEVAL POINTER 

JHAS THE QUEUE BOUNDARY BEEN EXCEEDED? 
IF NO, CONTINUE PROCESSING 

IF YES, RESET THE POINTER TO THE QUEUE BEGINNING 
LOAD THE CSR ADDRESS INTO Rl 
DISABLE RECEIVER INTERRUPT AND INTERRUPT ENABLE 
AND POINT Rl TO THE NEXT RECEIVED CHAR. REGISTER 
LOAD THE SOFTWARE SILO BUFFER ADDRESS 
SET THE RECEIVER BREAK LOOP TIMER 
SET THE COUNT FOR STORING THE DATA 
STORE A WORD IN THE SOFTWARE SILO 

IF THE DATA WASN'T VALID, GO ALLOW A LITTLE TIME FOH IT 

IF IT WAS VALID, REDUCE THE COUNT. 

IF NOT ZERO, GO STORE THE NEXT WORD 

IF ALL CHARACTERS RECEIVED, GO CHECK THEM 

RESET R2 TO THE PROPER BUFFER LOCATION 

SAVE THE REGISTER VALUES 

TEMPORARY RETURN TO MONITOR.... 

THEN CONTINUE AT NEXT INSTRUCTION. 

RESTORE THE REGISTER VALUES 

HAS ENOUGH TIME BEEN PERMITTED FOR A CHARACTER? 
IF NO, TRY TO GET ONE. 
LOAD THE DEVICE ADDRESS 
LOAD THE CSR CONTENTS 

REPORT THE NUMBER OF CHARACTERS WISSING 
SAVE THE REGISTERS 



DZBC D 
lOZBCO 

697 

11 
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001574** 012767 
001602' 104405 
001610" 004767 




000014 176304 
000000' 003726' 
000214 



176446 



000010 
176370 



0Q0322 
176422 

177774 

003706' 176406 

000336 
003706' 



mm 



00|744' 140067 17i 



176337 
000000' 



«QV #14-fERRT¥P 

RDERS^BEGp^TABl |D|D ^OT RECEIVi hhl TRANSMITTED CHARACTERS 

JSR PC^GETREG 



}fms RoariME permits one device to have its data checked. 

am ^ll |s„CHECKiB 



;F0R 



3$: 



5$: 



LINE OF THE DEVICE^ DATA ERRORS ARE REPORTED. 



MOV 
MOV 

HOV 

MOV 

MOV 

BGE 

BIT 

BEQ 

JSR 

HOVB 

SWAB 

cSpb 

m 

IHCB 
DEC 

SHE 



11 



LMCKBFrRS 
GNDAf A#CR5U 
.GHDATJ.bsj* 

iocMLdvcnmbr 
xmtchtSrs 

(R2)-»-i-R0 

piySTATERR 
RO^RCVDATA 

il77774,R0 
LNCKBP(fiO),RCVDA 



PC,0ERROR 
LNCKBF(RO) 



IPOIHT TO THE BEGINNING OF THE BUFFER 
|SET OP FOUR LINE CHECK BYTES 

SlOAD THE SOFTSiARE SILO ADDRESS IN R2 
>SAVE THE NUMBER OF THIS DEVICE 
;L0AD COUNT TO COMPARE CHARACTERS 
JFETCH A WORD FROM THE SILO INTO RO 
MF IT'S INVALID, GO CLEAN UP BUFFERS 
;ARE THERE ANV TRANSMISSION ERRORS? 
?IF NO, GO DETERMINE THE LINE NUMBER 
?IF YES, GO DETERMINE THE ERROR TYPE 
>SAVE THE RECEIVED CHARACTER 
jPOt THE IjINE NUMBER IN RO'S LOWER BYTE 
IISOLATE THE LINE NUMBER IN RO 
TA IIS THE DATA CORRECT? 
;IF YES, GO CHECK THE NEXT CHARACTER 
;IF NO, GO REPORT A DATA ERROR 
;SET UP THE NEXT CHARACTER FOR THIS LINE 
;REDUCE THE COUNT. ARB ALL CHARACTERS CHECKED? 
;IF NO, GO CHECK THE NEXT CHARACTER. 



;THIS ROUTINE UNLOCKS THE LINE CHECK BUFFER TO PERMIT ACCESS BY OTHER DEVICES. 

;IT THEN COMPUTES THE LINE NUMBER AND CLEARS THE APPROPRIATE FLAG FROM THE WATCHDOG 

JTIMER BYTE. 



RCVDONE:CLRB 
MOV 

CLR 
SEC 

1$: ROL 
DEC 
BGE 
BICB 



EXITS, BEGIN 



LCKOUT 

|gCLR,-(Rl) 

RO 

DVCHMBR 



;RESET THE BUFFER ACCESS SEMAPHORE 

/CLEAR THIS DEVICE AND DISABLE IT 

;THE DELETION FLAG «ILL PROPAGATE IN RO 

;USE THE CARRY BIT TO BUILD THE DELETION FLAG 

;M0VE THE FLAG TO THE NEXT DEVICE 

;«HEN THIS NUMBER IS NEGATIVE, THE CORRECT 

;DEVICE is POINTED TO. 

;CLEAR THIS FLAG 

;EXIT TO MONITOR- MODULE WAIT FOR INTERRUPT. 
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;SUBROUTINES 



001754' 
Q01764' 



010320 

um 

022323 
010223 

mm 




oIS__. 

000207 



002066' 
0020||' 

ooiifS' 

0Q2fi4' 
002120' 

002124' 



116702 

m 

006367 
006367 
000207 



176214 
176136 



17611 



;THE FIRST IS THE VECTOR LOADING SUBROUTINE. THE VECTOR ADDRESS IS PASSED IN RO, 
;TBE DEVICE ADDRESS IS PASSED IN R2. THE LINKING TABLE ADDRESS IS PASSED IN R3 . 
;THE BUS REQUEST PRIORITY LEVEL IS A PARAMETER TAKEN INDIRECTLY THROUGH R5. 



VCTLOADCMOV 

MOVE 

INC 

CMP 

MOV 

TST 

RTS 



R3,(R0)+ 
gJR5)+,(R0)+ 



;LOAD THE ADDRESS OF THE LINKING INSTRUCTION 
;AND the PRIORITY LEVEL INTO THE VECTOR 
;POINT RO TO THE NEXT VECTOR ADDRESS 
;POINT R3 TO THE CSR INSERT LOCATION 
;LOAD THE DEVICE ADDRESS IN THE LINK TABLE 
; ALIGN R3 FOR THE NEXT DEVICE 
;RETURN TO CALLING BLOCK 



;THIS ROUTINE SAVES THE REGISTER VALUES IN THE ERROR QUEUE, 
;FIRST-0UT DISCIPLINE WRAPAROUND BUFFER. 



A FIRST-IN, 



1$: 



MOV 
MOV 
MOV 

MOV 
MOV 
MOV 

CMP 

BHIS 

MOV 

MOV 

RTS 




INDEXING CAPABILITY 



;USE R5 FOR 
;SAVE RO... 
;SAVE Rl... 
;SAVE R2... 
;SAVE R3... 
;AND R4 

;has the queue boundary been exceeded? 
;IF NO, GO reload the pointer 

;RESET R5 to the que BEGINNING 

;SET the entry pointer to next entry POINT 

;RETURN TO THE CALLING BLOCK 



;THIS ROUTINE RETRIEVES REGISTER VALUES FROM THE ERROR QUEUE 

GETREG: MOV ERRQP0,R5 ;USE R5 FDR INDEXING CAPABILITY 

MOV (R5)+,R0 ;RETRIEVE RO... 

MOV (R5)+;R1 ; Rl... 

MOV (R5W,R2 ; R2... 

MOV (R5W,R3 ; R3... 

MOV <R5)+,R4 ;AND R4 

CMP #ERRQUE+60,R5 ;HAS THE QUEUE BOUNDARY BEEN EXCEEDED? 

BHIS Is ;IF NO, GO RELOAD THE POINTER 

MOV |ERRQUE,R5 ;RESET R5 TO THE QUEUE BEGINNING 

1$: MOV R5,ERRQPD ;SET THE RETRIEVAL POINTER TO THE NEXT FETCH POINT. 

RTS PC ;RETURN to the CALLING BLOCK 

;THIS ROUTINE CALCULATES HOW MANY CHARACTERS ARE BEING TRANSMITTED IN EACH PATTERN 

GETLINEZMOVB SLCTLIN,R2 ;COPY THE LINES SELECTED PARAMETER 

CLR XMTCNT PRESET THE TOTAL TRANSMISSION COUNT 

1$: RORB R2 ;GET A SELECTION BIT INTO THE CARRY BIT 

ADC XMTCNT ;ADD IT TO TOTAL NUMBER OF ACTIVE LINES 

TSTB R2 PARE 4. LINES CHECKED? 

BNE 1$ ;IF NOT, GO CHECK THE REST 

ASL XMTCNT ;NOW MULTIPLY BY B. 

ASL XMTCNT ; DO THIS BY SHIFTING THREE TIMES 

ASL XMTCNT ;WE NOW KNOW HOW MANY CHARACTERS ARE IN EACH BURST 

RTS PC ;RETURN TO THE CALLING SEGMENT 
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;THIS ROUTINE CALCULATES THE BAUD RATE FROM THE SRI OPTION. IF SRI IS 0,THE DEFAULT 
;RATE OF 9600. IS ASSIGNED. THE LEAST SIGNIFICANT BIT IS THE ONLY ONE CONSIDERED, 



;RATE OF 9600_ _ 

JTHE BAUD RATE IS THEN LOADED INTO THE LINE PARAMETER WORD. 




002316 
002322 



004767 
000207 



2S: 

176032 3$: 



4$: 



baudrte:tst 

BEQ 
MOV 
MOV 

is: ROR 
BCS 
DEC 
BMI 



BISB 
RTS 
BIS 



sil#R4 



BREAKS, BEGIN 
BREAKS/BEGI ■ 



,LINPAR+1 
;7000,LINPAR 



;IS A SPECIFIC RATE SELECTED? 
;IF NO, GO ASSIGN THE DEFAULT RATE 
;IF YES COPY SRI 

;SET UP THE BIT CONFIGURATION FOR A BAUD RATE SELECTION 

;ISOLATE THE NEXT BIT IN THE CARRY BIT 

;IF THIS IS THE BIT, PUT TOGETHER THE BAUD RATE 

;IF NOT, CALCULATE THE NEXT BIT CONFIGURATION 

;IF NONE OF THE BITS WERE SET, RETURN TO THE CALLING PRO 

;GC CHECK THE NEXT ALTERNATIVE 

;PLACE THE BAUD RATE IN THE LINE PARAMETER REGISTER 

;RETURN TO THE CALLING PROCEDURE 

;SET THE DEFAULT RATE(9600. BAUD) 

;TEMPORARY RETURN TO MONITOR-... 

;THEN CONTINUE AT NEXT INSTRUCTION. 

;RETURN TO CALLING PROCEDURE 



JTHIS ROUTINE DETERMINES I^HAT TYPE OF ERROR WAS INDICATED B¥ THE SILO AND REPORTS EACH 



002232' 104405 



002240 
002244 



004767 
005741 
010167 

005742 
010267 
062700 
010067 

002312- 104404 



175654 
000000' 003734' 
177564 



175620 

003706' 175620 
176016 175614 

175602 

003706' 

175570 

000000' 

177506 



staterr:mov ro,rcvmord 
mov (r1),csra 

MOV Rl/ACSR 
JSR PCjrSAVREG 
MOV |17,ERRTYP 

HRDERS#BEGIN,TAB2 
. ***************** 

JSR PCGETREG 
RTS PC 



;COPY THE INFORMATION RECEIVED 
;GET THE CONTENTS OF THE CONTROL REGISTER 
JREPORT THE CSR CONTENTS 
;SAVE THE REGISTERS 



IDEVICE RECEIVER ERROR 

;REST0RE THE REGISTERS 
;RETURN TO CALLING PROCEDURE 



jTHIS ROUTINE CALCULATES THE BUFFER ADDRESSES OF THE INCORRECT DATA AND REPORTS THE ERRO 



DERROR: JSR 
TST 
MOV 
MOVB 
MOYB 
TST 
MOV 
ADD 
MOV 

• ******* 

DATERS,BEGIN 

• ****** 



PCjjSAVREG 

ri^cIra 

lnckbf(ro),asb 
rcvdata^awas 

-(R2) 
R2#HASADR 
|LNCKBF,RO 
RQ,SBADR 

**»*****«****: 



;save the present register values 
;point to the csr address again 
;show which device it was 
;load the correct data value 
;load the actual data value 

;GET THE SILO ADDRESS OF THE DATA 
;L0AD IT FOR REPORTING 
;CALCULATE THE CORRECT VALUE ADDRESS 
JREPORT IT 
*************************** ******ft* 



********** 
PC/GETREG 
PC 



******** 



************** 



******* 
**** 



;LINKAGE TABLE 

;EACH ENTRY CONSISTS OF A JSR INSTRUCTION FOLLOWED BY A LOCATION INTO WHICH THE CSR 
?LOADED/ FOLLOHED BY THE SILO BUFFER ADDRESS, FOLLOIfjED BY A JSR FOR THE TRANSMITTER 
;INTERRUPT, THE CSR ADDRESS aORD, AND THE NUMBER OF THE INTERRUPTING DEVICE 
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854 
855 
856 
857 

m 

860 
861 
862 
863 
864 
865 

m 



888 
889 
890 
891 
892 
893 
894 
895 
896 
897 



900 
901 

908 
909 



24' 
30' 

40* 

OO23I4' 
002350* 
002352' 
002354 • 
002360' 
002362' 
002364' 
002370' 
002372' 
002374' 
002400' 
002402' 
002404' 
002410' 
002412' 
002414' 

'A- 
nmr- 



874 

m 

877 

880 

III TO- 8! 



004567 
000000 
002706' 
004567 

gooooo 

000000 

004567 

000000 

003006' 

004567 

000000 

000001 

turn 

003106' 
004567 

88888^ 

004567 
000000 
003206' 

000000 
000003 



884 
885 



m 88 



^442' 
005444' 
002450' 



002460' 
002462' 
Q02464' 



PI' 8881 
504' 00451 



00: 

00247 
002501 

oofso: 

00250 . 
002510 
002512 
002514 
00|52j? 
002522 



002544' 
002564' 



003306' 
004567 
*00Q00 
.00004 
004567 
000000 

000000 

000005 
004567 



6 

-04567 
000000 

000000 

000007 



000010 

8888i; 



177020 
176532 
177000 
176512 
176760 
176472 
176740 
176452 
176720 
176432 
176700 
176412 
176660 
176372 
176640 
176352 
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R5/RCVINT 



LNKTAB: JSR 



SILOO 
JSR 



JSR 


SILOl 
JSR 

1 

JSR 


SIL02 
JSR 

2 

JSR 


SIL03 
JSR 

3 

JSR 


SIL04 
JSR 

4 

JSR 


SILOS 
JSR 

5 

JSR 


SIL06 
JSR 

6 

JSR 


SILa7 
JSR 

7 



R5,XMTINT 
R5,RCVINT 
R5,XMTINT 
R5,RCVINT 
R5,XMTINT 
R5,RCVINT 
R5,XMTINT 
R5/RCVINT 
R5/XMTINT 
R5,RCVINT 
R5/XHTINT 
R5,RCVINT 
R5,XMTINT 
R5,RCVINT 
R5/XMTINT 



;THESE ARE THE QUEUES. 



XMTQUE: .BLKH 8. 

rcvque: -blkw g. 
errque: -BLKW 25. 



35 PAGE 20 

;LINK FOR RECEIVER 

;L1NK FOR TRANSMITTER 

;L1NK for RECEIVER 1 

;LINK FOR TRANSMITTER 1 

;LINK FOR RECEIVER 2 

;LINK FOR TRANSMITTER 2 

;HNK FOR RECEIVER 3 

JLINK FOR TRANSMITTER 3 

;LINK FOR RECEIVER A 

;LINK FOR TRANSMITTER 4 

?LINK FOR RECEIVER 5 

;LINK FOR TRANSMITTER 5 

;LINK FOR RECEIVER 6 

jLINK FOR TRANSMITTER 6 

;LINK for RECEIVER 7 

;LINK FOR TRANSMITTER 7 



JTRANSMITTER SERVICE QUEUE 
;RECEIVER SERVICE QUEUE 
>ERROR SERVICE QUEUE 



;THESE ARE THE BUFFERS 



DZBC DEC/Xll SYSTEM EXERCISER MODULE 

XDZBCO.Pll 12--OCT-'78 11:58 
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9 - 

tti 

944 
945 
946 
947 
948 



742' 003746' 



003746' 042504 044526 042503 
003754' 020040 
003756' 000006 

003764' 044040 047125 000107 



XMTBUF: 

SILOO: 
SILOl: 
SIL02: 
SIL03: 
SIL04: 

SILOS: 
SIL06: 
SIL07: 
LHCKBF: 



XMtQPl: 
XMTQPO: 
RCVQPI: 
RCVQPO: 
ERRQPI: 
ERRQPO: 



TABl: 
TAB2: 

hung: 

Ml: 

M2: 
M3: 



-BLKB 
.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKW 
.BLKB 



ill 

32. 
32. 

11: 

32. 
32. 
4. 



;transmitter buffers, one character for each line 

?receiver buffer for device 

;rbceiver buffer fdr device 1 

jreceiver buffer fdr device 2 

;receiver buffer for device 3 

;RECEIVER buffer FOR DEVICE 4 

^RECEIVER BUFFER FOR DEVICE 5 

^RECEIVER BUFFER FOR DEVICE 6 

/RECEIVER BUFFER FOR DEVICE 7 

;BUFFER FOR CHECKING INDIVIDUAL LINE DATA 



;THESE ARE THE QUEUE POINTERS 



OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 

;THESE ARE THE ASCII 

XMTCNT 

MISS 

177777 

DVCNMBR 

RCVHORD 

177777 

Ml 

177777 

.ASCII 'DEVICE ' 

.BLKB 6 
.ASCIZ ' HUNG' 
.EVEN 
.END 



;TRANSHITTER QUEUE ENTRY (IN) POINTER 
;TRANSMITTER queue RETRIEVAL POINTER (OUT) 
;RECEIVER QUEUE POINTERS 

;ERROR QUE POINTERS 

MESSAGES AND ERROR PRINTOUT TABLES 

;TABLE 1 IS USED TO REPORT XMTCNTING CHARACTERS 
;FIRST£ THE NUMBER TRANSMITTED IS GIVEN 
;THEN the NUMBER OF CHARACTERS NOT RECEIVED 
;TERMINATOR FOR TABLE 1 

;TABLE 2 IS USED TO REPORT RECEIVER ERRORS 
;WORD CONTAINING THE ERRORS 
;TERMINATOR FOR TABLE 2 



DZBC DEC/Xll SYSTEM EXERCISER MODULE 
XDZBCO.Pll 12-OCT-78 11:58 



BGNDAT 
BITO = 
BITl ^ 



377f 

4871 

3431 

390| 

38l| 

37 9| 

382# 

498 

340# 

666 

412# 

390l 
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608* 694* 
582 

442 489 



431 



542 



823* 
521 



543 566 
689 699 
708 709 



748 



580 
816 



OOOIOQR 
000304R 



ml 



542 
457 
454 



707# 



402 
402 



693* 
510 



733 
544 
737* 



552 
937 



575 

769* 

783* 

640 
579# 



928ft 

768 

825* 

740 



77 4# 



m 
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nil 699 827 



509# 

477* 664 669* 732* 

ill* m- isr m' im 



R 



PRTY 



^ = flii 

mm 



188 



943 



566 
597 



623 



695* 935 



III Ifl III In Iff Iff lis* lit m M ill 



m 349 350 351 368 369 320.. |71 J^? Iq^I f^l 111 



390# 
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XDZBCO.Pll 12-0CT-78 11:58 



000310R 

m\¥ 

003716R 
003720R 
002544R 
001414R 

PoIoSr 

000334R 
000056R 
000060R 
OOOIOQ 

001772R 
000102R 

mm 

000422R 
010000 



sIoIr 



398» 
38 3# 



91 5# 

m 

918 
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718* 

732# 

854 

497 

653* 

670 

469 



821* 
429 



609 

842* 

427* 



860 
656* 

tw 

668 

ill* 

437# 



654 
687 
438 



838 






866 


872 


878 


657 


659* 


926 


672 


674* 


927 


659 


672 


674 



696 
487 



760# 
520 



824 
554* 



884 890 
90 6# 



834 
572 



919., 
530 



000020R 

o88oIIr 

000314R 
O999I6R 
002204R 
000062R 



388 
803 



42 6# 
821# 



TAB! 

TAB2 

TCR 

TDR 

TEMPI 

TIE 



566 
622 



DZBC DEC/Xll SVSfEM EXERCISER MODULE 



XDZBC0«P11 



flMER 
TMRCNT 

tMRSET 

iRpr"- 

VCTL 

fl- 

MDTO 
XFLAG 
XMTBUF 



12-0CT-78 11S58 



rr 



XMTCMT 
"TINT 



XMtl 
XMTQfx 

XMTQPO 
XHTQOE 
XMTSR? 




§ 11 



9» 



it 

94S| 
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749# 




791* 



794* 

i' 

912# 



795* 
887 



603 
913# 



nr m 



905» 
914# 



915# 



916# 



ERRORS DEfECfED: 

DEEAOLT 6L0BALS GEHERATED: 

XDZBCO, XDZBCO/SOL/CRF :SYM=DDXCOM, XDZBCO 
RUH-TIHE: 2 3 .4 SECOMDS 
RON-TIME RATIOS lf/5sl,2 
CORE OSEDS IK (13 PAGES) 



